www.gusucode.com > 酷维企业网站CMS管理系统 v2.1.0 > 酷维企业网站CMS管理系统 v2.1.0\code\right_i.asp
<%
'程序名称:酷维企业网站程序CMS
'运行环境:ASP+ACCESS
'程序大小:4.60MB
'软件类型:ASP源码
'联系方式:QQ:921072227
'程序演示:企业程序
'官方网站:http://cms.coczz.com
%>
<script language="JavaScript" src="admin/system/indexdatejs.js"></script>
<script language="javascript">
function checkform(){
if(ListItemForSale.shucity.value==''){
alert("请输入你所要查询的城市！");
ListItemForSale.shucity.focus();
return false;
}
if(ListItemForSale.arrive_date.value=='点击选择日期'){
alert("请选择入住日期！");
ListItemForSale.arrive_date.focus();
return false;
}
if(ListItemForSale.leave_date.value=='点击选择日期'){
alert("请选择退房日期！");
ListItemForSale.leave_date.focus();
return false;
}
}
</script>
<SCRIPT language=javascript>
function secCard(n)
{
if(n==1)
{
secTable.cells[0].className="cardSelected1";
secTable.cells[2].className="cardNormal";
}
if(n==2)
{
secTable.cells[0].className="cardNormal";
secTable.cells[2].className="cardSelected1";
}
}
function secBoard(n)
{
for(i=0;i<mainTable.tBodies.length;i++)
mainTable.tBodies[i].style.display="none";
mainTable.tBodies[n].style.display="";
}
</SCRIPT><table width="214" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="32" background="images/right_01.jpg" style="font-weight:bold; font-size:12px; color:#333333; padding-left:38px; padding-top:5px;">用户登陆</td>
</tr>
<tr>
<td height="151" align="center" background="images/right_03.jpg" style="border-left:1px solid #C5D4DF;border-right:1px solid #C5D4DF">
<table width="90%" border="0" cellspacing="0" cellpadding="2" align="center">
<%if request.Cookies("Gemisum")("username")="" then%>
<form name="userlogin" method="post" action="User_Checklogin.asp">
<tr>
<td height="30" align="center"><span style="color:#555555">用户名：</span>
<input type="text" name="username" size="14" class='an5'> </td>
</tr>
<tr>
<td height="30" align="center"><span style="color:#555555">密 码：</span>
<input type="password" name="userpassword" size="14" class='an5'> </td>
</tr>
<tr>
<td height="30" align="center"><span style="color:#555555">验证码：</span>
<input name=verifycode type=text value="<%If GetCode=9999 Then Response.Write "9999"%>" maxLength=4 size=6 class="an6">
<img src=GetCode.asp> </td>
</tr>
<tr>
<td align="center" valign="middle"><span style="padding-top:3px;">
<input type="image" name="imageField" src="Images/sub.jpg" /> <a href="User_Reg.asp"><img src="Images/reg.jpg" width="65" height="29" border="0" /></a></span></td>
</tr>
</form>
<%else%>
<tr>
<td align="center"><%
set rs=server.createobject("adodb.recordset")
rs.open "select jifen,yucun,reglx,vipdate from [userb] where username='"&request.Cookies("Gemisum")("username")&"'",conn,1,3
if rs("vipdate")<>"" then
'看是不是过期VIP
if rs("vipdate")<date and rs("reglx")>2 then
rs("reglx")=1
rs.update
end if
end if
response.Cookies("Gemisum")("yucun")=rs("yucun")
response.Cookies("Gemisum")("jifen")=rs("jifen")
response.Cookies("Gemisum")("reglx")=rs("reglx")
rs.close
set rs=nothing
if request.Cookies("Gemisum")("reglx")=3 then
response.write "<br><br>"&request.Cookies("Gemisum")("username")&" 企业用户您好<br>您目前有"&request.Cookies("Gemisum")("jifen")&"积分,预存款"&request.Cookies("Gemisum")("yucun")&"元 "
Else
if request.Cookies("Gemisum")("reglx")=2 then
response.write "<br><br>"&request.Cookies("Gemisum")("username")&" 贵宾您好<br>您目前有"&request.Cookies("Gemisum")("jifen")&"积分,预存款"&request.Cookies("Gemisum")("yucun")&"元 "
else
response.write "<br><br>"&request.Cookies("Gemisum")("username")&" 您好<br>您目前有"&request.Cookies("Gemisum")("jifen")&"积分,预存款"&request.Cookies("Gemisum")("yucun")&"元 "
end if
end if
response.write "<br><a href=userinfo.asp target=_blank><font color=red>进入会员中心</font></a>"
response.write "<br><a href=logout.asp>注销退出</a>"
end if
%></td>
</tr>
</table>
</td>
</tr>
<tr>
<td><img src="images/right_04.jpg" width="214" height="4" alt="" /></td>
</tr>
</table>
<table width="214" height="4" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="4"></td>
</tr>
</table>
<table width="214" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="32" background="images/right_01.jpg" style="font-weight:bold; font-size:12px; color:#333333; padding-left:38px; padding-top:5px;">企业咨讯</td>
</tr>
<tr>
<td height="151" style="border-left:1px solid #C5D4DF;border-right:1px solid #C5D4DF"><table width="93%" border="0" cellspacing="0" cellpadding="2">
<tr>
<% set rs= Server.CreateObject("adodb.recordset")
sql="select top 2 * from news where mytype=66 order by id desc"
rs.open sql,conn,1
if not rs.eof or bof then
while not rs.eof
%>
<td align="center"><table border="0" style=" border:1px #EEE solid" cellspacing="0" cellpadding="0">
<tr>
<td><a href="show.asp?id=<%= rs("id") %>" target="_blank"><img src="<%= rs("tu") %>" width="85" height="70" border="0" alt="<%= rs("bt") %>" /></a></td>
</tr>
</table></td>
<% rs.movenext
wend
end if
%>
</tr>
</table><table width="93%" border="0" cellspacing="0" cellpadding="0">
<% set rs= Server.CreateObject("adodb.recordset")
sql="select top 6 * from news where mytype=66 order by id desc"
rs.open sql,conn,1
while not rs.eof
%>
<tr>
<td height="25" style="border-bottom:1px dotted #D0EDC5;">
· <a href="show.asp?id=<%=rs("id")%>" target="_blank">
<%=left(rs("bt"),14)%>
</a></td>
</tr>
<tr>
<td height="1" colspan="2" align="center" background="img/ba.gif"></td>
</tr>
<% rs.movenext
wend
%>
</table></td>
</tr>
<tr>
<td><img src="images/right_04.jpg" width="214" height="4" alt="" /></td>
</tr>
</table>
<table width="214" height="4" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="4"></td>
</tr>
</table>
<table width="214" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="32" background="images/right_01.jpg" style="font-weight:bold; font-size:12px; color:#333333; padding-left:38px; padding-top:5px;">合作伙伴</td>
</tr>
<tr>
<td height="151" align="center" style="border-left:1px solid #C5D4DF;border-right:1px solid #C5D4DF"><table width="93%" border="0" cellspacing="0" cellpadding="2">
<tr>
<td align="center"><img src="Images/LINK/logo.gif" width="200" height="45" /></td>
</tr>
<tr>
<td align="center"><img src="Images/LINK/baidu_logo.gif" width="200" height="43" /></td>
</tr>
<tr>
<td align="center"><img src="Images/LINK/maps_logo_beta_small.png" width="200" height="45" /></td>
</tr>
<tr>
<td align="center"><img src="Images/LINK/001.gif" width="200" height="45" /></td>
</tr>
</table>
</td>
</tr>
<tr>
<td><img src="images/right_04.jpg" width="214" height="4" alt="" /></td>
</tr>
</table>